home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / vol16n12.zip / ICONED.ZIP / ICON_SRC.ZIP / MAIN.DFM / MAIN.txt < prev   
Text File  |  1997-05-01  |  20KB  |  661 lines
  1. object MainForm: TMainForm
  2.   Left = 195
  3.   Top = 150
  4.   Width = 383
  5.   Height = 388
  6.   Caption = 'IconEdit'
  7.   Font.Color = clBlack
  8.   Font.Height = -13
  9.   Font.Name = 'Arial'
  10.   Font.Style = []
  11.   FormStyle = fsMDIForm
  12.   Icon.Data = {<image000.ico>}
  13.   Menu = MainMenu1
  14.   Scaled = False
  15.   WindowMenu = Window1
  16.   OnClose = FormClose
  17.   OnCreate = FormCreate
  18.   OnResize = FormResize
  19.   OnShow = FormShow
  20.   PixelsPerInch = 96
  21.   TextHeight = 16
  22.   object ToolPanel: TPanel
  23.     Left = 0
  24.     Top = 0
  25.     Width = 58
  26.     Height = 342
  27.     Align = alLeft
  28.     BevelInner = bvLowered
  29.     ParentShowHint = False
  30.     ShowHint = False
  31.     TabOrder = 0
  32.     object CaptureSpeedButton: TSpeedButton
  33.       Left = 4
  34.       Top = 37
  35.       Width = 25
  36.       Height = 25
  37.       Hint = 'Capture'
  38.       GroupIndex = 1
  39.       Glyph.Data = {
  40.         66010000424D6601000000000000760000002800000014000000140000000100
  41.         040000000000F000000000000000000000000000000000000000000000000000
  42.         80000080000000808000800000008000800080800000C0C0C000808080000000
  43.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  44.         7777777700007777777777777777007700007777777777770070FF0700007777
  45.         777777770F0FFF0700007777777777770FFFF07700007007007007000FFF0777
  46.         00007077777777770FFFF0770000777777777777000000770000707777777777
  47.         7707777700007077777777777707777700007777777777777777777700007077
  48.         7777777777077777000070777777777777077777000077777777777777777777
  49.         0000707777777777770777770000707777777777770777770000777777777777
  50.         7777777700007077777777777707777700007007007007007007777700007777
  51.         77777777777777770000}
  52.       ParentShowHint = False
  53.       ShowHint = True
  54.       OnClick = CaptureSpeedButtonClick
  55.     end
  56.     object PencilSpeedButton: TSpeedButton
  57.       Tag = 1
  58.       Left = 29
  59.       Top = 37
  60.       Width = 25
  61.       Height = 25
  62.       Hint = 'Pencil'
  63.       GroupIndex = 1
  64.       Down = True
  65.       Glyph.Data = {
  66.         66010000424D6601000000000000760000002800000014000000140000000100
  67.         040000000000F000000000000000000000000000000000000000000000000000
  68.         80000080000000808000800000008000800080800000C0C0C000808080000000
  69.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  70.         7777777700007777777777777777777700007777777777777707777700007777
  71.         7777777780707777000077777777777007770000000077777777700007777777
  72.         000077777770080077777777000077777008FF707777777700007777008FF707
  73.         7777777700007770330F770777777777000077033B3070777777777700007033
  74.         B3BB0077777777770000033B3BB3077777777777000033B3BB30777777777777
  75.         00003B3BB3077777777777770000B3BB307777777777777700003BB307777777
  76.         777777770000BB3077777777777777770000B307777777777777777700007777
  77.         77777777777777770000}
  78.       ParentShowHint = False
  79.       ShowHint = True
  80.       OnClick = CaptureSpeedButtonClick
  81.     end
  82.     object FillSpeedButton: TSpeedButton
  83.       Tag = 2
  84.       Left = 4
  85.       Top = 62
  86.       Width = 25
  87.       Height = 25
  88.       Hint = 'Fill'
  89.       GroupIndex = 1
  90.       Glyph.Data = {
  91.         66010000424D6601000000000000760000002800000014000000140000000100
  92.         040000000000F000000000000000000000000000000000000000000000000000
  93.         80000080000000808000800000008000800080800000C0C0C000808080000000
  94.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  95.         7777777700007707777777777777777700007767777777777777777700007707
  96.         7777777007777777000077677777770800777777000077607777708870077777
  97.         00007766777708877F0077770000770677708877FFF00777000077660708877F
  98.         FFFF007700007770608877FFFFFFF0770000777608077FF0FFFF707700007777
  99.         6007FF0F0FF70777000077777600FF00FF70777700007777006600FFF7077777
  100.         00007777077660FF707777770000777077700007077777770000777077007700
  101.         7777777700007770007777777777777700007777777777777777777700007777
  102.         77777777777777770000}
  103.       ParentShowHint = False
  104.       ShowHint = True
  105.       OnClick = CaptureSpeedButtonClick
  106.     end
  107.     object LineSpeedButton: TSpeedButton
  108.       Tag = 3
  109.       Left = 29
  110.       Top = 62
  111.       Width = 25
  112.       Height = 25
  113.       Hint = 'Line'
  114.       GroupIndex = 1
  115.       Glyph.Data = {
  116.         66010000424D6601000000000000760000002800000014000000140000000100
  117.         040000000000F000000000000000000000000000000000000000000000000000
  118.         80000080000000808000800000008000800080800000C0C0C000808080000000
  119.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  120.         7777777700007777777777777777700700007777777777777777007700007777
  121.         7777777777700777000077777777777777007777000077777777777770077777
  122.         0000777777777777007777770000777777777770077777770000777777777700
  123.         7777777700007777777770077777777700007777777700777777777700007777
  124.         7770077777777777000077777700777777777777000077777007777777777777
  125.         0000777700777777777777770000777007777777777777770000770077777777
  126.         7777777700007007777777777777777700007077777777777777777700007777
  127.         77777777777777770000}
  128.       ParentShowHint = False
  129.       ShowHint = True
  130.       OnClick = CaptureSpeedButtonClick
  131.     end
  132.     object ClearRectangleSpeedButton: TSpeedButton
  133.       Tag = 4
  134.       Left = 4
  135.       Top = 87
  136.       Width = 25
  137.       Height = 25
  138.       Hint = 'Rectangle'
  139.       GroupIndex = 1
  140.       Glyph.Data = {
  141.         66010000424D6601000000000000760000002800000014000000140000000100
  142.         040000000000F000000000000000000000000000000000000000000000000000
  143.         80000080000000808000800000008000800080800000C0C0C000808080000000
  144.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  145.         7777777700007000000000000000000700007077777777777777770700007077
  146.         7777777777777707000070777777777777777707000070777777777777777707
  147.         0000707777777777777777070000707777777777777777070000707777777777
  148.         7777770700007077777777777777770700007077777777777777770700007077
  149.         7777777777777707000070777777777777777707000070777777777777777707
  150.         0000707777777777777777070000707777777777777777070000707777777777
  151.         7777770700007077777777777777770700007000000000000000000700007777
  152.         77777777777777770000}
  153.       ParentShowHint = False
  154.       ShowHint = True
  155.       OnClick = CaptureSpeedButtonClick
  156.     end
  157.     object FilledRectangleSpeedButton: TSpeedButton
  158.       Tag = 5
  159.       Left = 29
  160.       Top = 87
  161.       Width = 25
  162.       Height = 25
  163.       Hint = 'Filled rectangle'
  164.       GroupIndex = 1
  165.       Glyph.Data = {
  166.         66010000424D6601000000000000760000002800000014000000140000000100
  167.         040000000000F000000000000000000000000000000000000000000000000000
  168.         80000080000000808000800000008000800080800000C0C0C000808080000000
  169.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  170.         77777777000070000000000000000007000070F66F66F66F66F66F0700007066
  171.         F66F66F66F66F6070000706F66F66F66F66F6607000070F66F66F66F66F66F07
  172.         00007066F66F66F66F66F6070000706F66F66F66F66F6607000070F66F66F66F
  173.         66F66F0700007066F66F66F66F66F6070000706F66F66F66F66F6607000070F6
  174.         6F66F66F66F66F0700007066F66F66F66F66F6070000706F66F66F66F66F6607
  175.         000070F66F66F66F66F66F0700007066F66F66F66F66F6070000706F66F66F66
  176.         F66F6607000070F66F66F66F66F66F0700007000000000000000000700007777
  177.         77777777777777770000}
  178.       ParentShowHint = False
  179.       ShowHint = True
  180.       OnClick = CaptureSpeedButtonClick
  181.     end
  182.     object ClearEllipseSpeedButton: TSpeedButton
  183.       Tag = 6
  184.       Left = 4
  185.       Top = 112
  186.       Width = 25
  187.       Height = 25
  188.       Hint = 'Ellipse'
  189.       GroupIndex = 1
  190.       Glyph.Data = {
  191.         66010000424D6601000000000000760000002800000014000000140000000100
  192.         040000000000F000000000000000000000000000000000000000000000000000
  193.         80000080000000808000800000008000800080800000C0C0C000808080000000
  194.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  195.         7777777700007777777000000777777700007777700777777007777700007777
  196.         0777777777707777000077707777777777770777000077077777777777777077
  197.         0000770777777777777770770000707777777777777777070000707777777777
  198.         7777770700007077777777777777770700007077777777777777770700007077
  199.         7777777777777707000070777777777777777707000077077777777777777077
  200.         0000770777777777777770770000777077777777777707770000777707777777
  201.         7770777700007777700777777007777700007777777000000777777700007777
  202.         77777777777777770000}
  203.       ParentShowHint = False
  204.       ShowHint = True
  205.       OnClick = CaptureSpeedButtonClick
  206.     end
  207.     object FilledEllipseSpeedButton: TSpeedButton
  208.       Tag = 7
  209.       Left = 29
  210.       Top = 112
  211.       Width = 25
  212.       Height = 25
  213.       Hint = 'Filled ellipse'
  214.       GroupIndex = 1
  215.       Glyph.Data = {
  216.         66010000424D6601000000000000760000002800000014000000140000000100
  217.         040000000000F000000000000000000000000000000000000000000000000000
  218.         80000080000000808000800000008000800080800000C0C0C000808080000000
  219.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  220.         77777777000077777770000007777777000077777006F66F6007777700007777
  221.         066F66F66F6077770000777066F66F66F66F0777000077066F66F66F66F60077
  222.         00007706F66F66F66F66F0770000706F66F66F66F66F6007000070F66F66F66F
  223.         66F66F0700007066F66F66F66F66F6070000706F66F66F66F66F6607000070F6
  224.         6F66F66F66F66F0700007066F66F66F66F66F0070000770F66F66F66F66F6077
  225.         000077066F66F66F66F6607700007770F66F66F66F6607770000777706F66F66
  226.         F6607777000077777006F66F6007777700007777777000000777777700007777
  227.         77777777777777770000}
  228.       ParentShowHint = False
  229.       ShowHint = True
  230.       OnClick = CaptureSpeedButtonClick
  231.     end
  232.     object NewSpeedButton: TSpeedButton
  233.       Left = 6
  234.       Top = 6
  235.       Width = 23
  236.       Height = 22
  237.       Hint = 'New'
  238.       Glyph.Data = {
  239.         78010000424D7801000000000000760000002800000020000000100000000100
  240.         04000000000000000000120B0000120B00000000000000000000000000000000
  241.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  242.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555550555
  243.         555555555555F55555555505555B0555570555F55557F55555F55B50555B0555
  244.         7B55575F5557F555575555B5055B5557B5555575F55755557555555B5550005B
  245.         55555557555FFF575555555555BBB0055555555555777FF5555555555BBBBB00
  246.         55555555577777FF55555000BBBBBBB050005FFF7777777F5FFFBBB5BBBBBBB0
  247.         BBB577757777777F77755555BBBBBBB55555555577777775555555555BBBBB55
  248.         55555555577777555555555705BBB55505555555F5777555F555557B5555055B
  249.         505555575555F5575F5557B5555B0555B50555755557F55575F55B55555B0555
  250.         5B5557555557F55557555555555B5555555555555557555555550000}
  251.       NumGlyphs = 2
  252.       ParentShowHint = False
  253.       ShowHint = True
  254.       OnClick = New1Click
  255.     end
  256.     object SaveSpeedButton: TSpeedButton
  257.       Left = 29
  258.       Top = 6
  259.       Width = 23
  260.       Height = 22
  261.       Hint = 'Save'
  262.       Glyph.Data = {
  263.         F6000000424DF600000000000000760000002800000010000000100000000100
  264.         04000000000080000000CE0E0000D80E00000000000000000000000000000000
  265.         80000080000000808000800000008000800080800000C0C0C000808080000000
  266.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
  267.         7777770000000000000770CC000000770C0770CC000000770C0770CC00000077
  268.         0C0770CC000000000C0770CCCCCCCCCCCC0770CC00000000CC0770C0FFFFFFFF
  269.         0C0770C0FFFFFFFF0C0770C0FFFFFFFF0C0770C0FFFFFFFF0C0770C0FFFFFFFF
  270.         000770C099999999070770000000000000077777777777777777}
  271.       ParentShowHint = False
  272.       ShowHint = True
  273.       OnClick = SaveSpeedButtonClick
  274.     end
  275.     object TransparentPanel: TPanel
  276.       Tag = 1
  277.       Left = 13
  278.       Top = 317
  279.       Width = 16
  280.       Height = 16
  281.       Hint = 'Transparent'
  282.       BevelOuter = bvLowered
  283.       BevelWidth = 2
  284.       Color = clGreen
  285.       ParentShowHint = False
  286.       ShowHint = True
  287.       TabOrder = 0
  288.       OnMouseDown = Panel0MouseDown
  289.     end
  290.     object ReversePanel: TPanel
  291.       Tag = 2
  292.       Left = 30
  293.       Top = 317
  294.       Width = 16
  295.       Height = 16
  296.       Hint = 'Reverse screen'
  297.       BevelOuter = bvLowered
  298.       BevelWidth = 2
  299.       Color = clRed
  300.       ParentShowHint = False
  301.       ShowHint = True
  302.       TabOrder = 1
  303.       OnMouseDown = Panel0MouseDown
  304.     end
  305.     object Panel0: TPanel
  306.       Left = 13
  307.       Top = 181
  308.       Width = 16
  309.       Height = 16
  310.       BevelOuter = bvLowered
  311.       BevelWidth = 2
  312.       Color = clBlack
  313.       TabOrder = 2
  314.       OnMouseDown = Panel0MouseDown
  315.     end
  316.     object Panel1: TPanel
  317.       Left = 30
  318.       Top = 181
  319.       Width = 16
  320.       Height = 16
  321.       BevelOuter = bvLowered
  322.       BevelWidth = 2
  323.       Color = clWhite
  324.       TabOrder = 3
  325.       OnMouseDown = Panel0MouseDown
  326.     end
  327.     object Panel2: TPanel
  328.       Left = 13
  329.       Top = 197
  330.       Width = 16
  331.       Height = 16
  332.       BevelOuter = bvLowered
  333.       BevelWidth = 2
  334.       Color = clGray
  335.       TabOrder = 4
  336.       OnMouseDown = Panel0MouseDown
  337.     end
  338.     object Panel3: TPanel
  339.       Left = 30
  340.       Top = 197
  341.       Width = 16
  342.       Height = 16
  343.       BevelOuter = bvLowered
  344.       BevelWidth = 2
  345.       Color = clSilver
  346.       TabOrder = 5
  347.       OnMouseDown = Panel0MouseDown
  348.     end
  349.     object Panel8: TPanel
  350.       Left = 13
  351.       Top = 245
  352.       Width = 16
  353.       Height = 16
  354.       BevelOuter = bvLowered
  355.       BevelWidth = 2
  356.       Color = clGreen
  357.       TabOrder = 6
  358.       OnMouseDown = Panel0MouseDown
  359.     end
  360.     object Panel9: TPanel
  361.       Left = 30
  362.       Top = 245
  363.       Width = 16
  364.       Height = 16
  365.       BevelOuter = bvLowered
  366.       BevelWidth = 2
  367.       Color = clLime
  368.       TabOrder = 7
  369.       OnMouseDown = Panel0MouseDown
  370.     end
  371.     object Panel10: TPanel
  372.       Left = 13
  373.       Top = 261
  374.       Width = 16
  375.       Height = 16
  376.       BevelOuter = bvLowered
  377.       BevelWidth = 2
  378.       Color = clTeal
  379.       TabOrder = 8
  380.       OnMouseDown = Panel0MouseDown
  381.     end
  382.     object Panel11: TPanel
  383.       Left = 30
  384.       Top = 261
  385.       Width = 16
  386.       Height = 16
  387.       BevelOuter = bvLowered
  388.       BevelWidth = 2
  389.       Color = clAqua
  390.       TabOrder = 9
  391.       OnMouseDown = Panel0MouseDown
  392.     end
  393.     object Panel12: TPanel
  394.       Left = 13
  395.       Top = 277
  396.       Width = 16
  397.       Height = 16
  398.       BevelOuter = bvLowered
  399.       BevelWidth = 2
  400.       Color = clNavy
  401.       TabOrder = 10
  402.       OnMouseDown = Panel0MouseDown
  403.     end
  404.     object Panel13: TPanel
  405.       Left = 30
  406.       Top = 277
  407.       Width = 16
  408.       Height = 16
  409.       BevelOuter = bvLowered
  410.       BevelWidth = 2
  411.       Color = clBlue
  412.       TabOrder = 11
  413.       OnMouseDown = Panel0MouseDown
  414.     end
  415.     object Panel14: TPanel
  416.       Left = 13
  417.       Top = 293
  418.       Width = 16
  419.       Height = 16
  420.       BevelOuter = bvLowered
  421.       BevelWidth = 2
  422.       Color = clPurple
  423.       TabOrder = 12
  424.       OnMouseDown = Panel0MouseDown
  425.     end
  426.     object Panel15: TPanel
  427.       Left = 30
  428.       Top = 293
  429.       Width = 16
  430.       Height = 16
  431.       BevelOuter = bvLowered
  432.       BevelWidth = 2
  433.       Color = clFuchsia
  434.       TabOrder = 13
  435.       OnMouseDown = Panel0MouseDown
  436.     end
  437.     object Panel4: TPanel
  438.       Left = 13
  439.       Top = 213
  440.       Width = 16
  441.       Height = 16
  442.       BevelOuter = bvLowered
  443.       BevelWidth = 2
  444.       Color = clMaroon
  445.       TabOrder = 14
  446.       OnMouseDown = Panel0MouseDown
  447.     end
  448.     object Panel5: TPanel
  449.       Left = 30
  450.       Top = 213
  451.       Width = 16
  452.       Height = 16
  453.       BevelOuter = bvLowered
  454.       BevelWidth = 2
  455.       Color = clRed
  456.       TabOrder = 15
  457.       OnMouseDown = Panel0MouseDown
  458.     end
  459.     object Panel6: TPanel
  460.       Left = 13
  461.       Top = 229
  462.       Width = 16
  463.       Height = 16
  464.       BevelOuter = bvLowered
  465.       BevelWidth = 2
  466.       Color = clOlive
  467.       TabOrder = 16
  468.       OnMouseDown = Panel0MouseDown
  469.     end
  470.     object Panel7: TPanel
  471.       Left = 30
  472.       Top = 229
  473.       Width = 16
  474.       Height = 16
  475.       BevelOuter = bvLowered
  476.       BevelWidth = 2
  477.       Color = clYellow
  478.       TabOrder = 17
  479.       OnMouseDown = Panel0MouseDown
  480.     end
  481.     object LeftButtonPanel: TPanel
  482.       Left = 4
  483.       Top = 147
  484.       Width = 25
  485.       Height = 25
  486.       Hint = 'Left button color'
  487.       BevelOuter = bvLowered
  488.       BevelWidth = 2
  489.       Color = clBlack
  490.       Font.Color = clWhite
  491.       Font.Height = -11
  492.       Font.Name = 'MS Sans Serif'
  493.       Font.Style = []
  494.       ParentFont = False
  495.       ParentShowHint = False
  496.       ShowHint = True
  497.       TabOrder = 18
  498.     end
  499.     object RightButtonPanel: TPanel
  500.       Left = 30
  501.       Top = 147
  502.       Width = 25
  503.       Height = 25
  504.       Hint = 'Right button color'
  505.       BevelOuter = bvLowered
  506.       BevelWidth = 2
  507.       Color = clWhite
  508.       Font.Color = clWhite
  509.       Font.Height = -11
  510.       Font.Name = 'MS Sans Serif'
  511.       Font.Style = []
  512.       ParentFont = False
  513.       ParentShowHint = False
  514.       ShowHint = True
  515.       TabOrder = 19
  516.     end
  517.   end
  518.   object MainMenu1: TMainMenu
  519.     Left = 66
  520.     object File1: TMenuItem
  521.       Caption = '&File'
  522.       ShortCut = 0
  523.       OnClick = File1Click
  524.       object New1: TMenuItem
  525.         Caption = '&New'
  526.         ShortCut = 0
  527.         OnClick = New1Click
  528.       end
  529.       object Open1: TMenuItem
  530.         Caption = '&Open...'
  531.         ShortCut = 16463
  532.         OnClick = Open1Click
  533.       end
  534.       object Save: TMenuItem
  535.         Caption = '&Save'
  536.         ShortCut = 16467
  537.         OnClick = SaveSpeedButtonClick
  538.       end
  539.       object SaveAs: TMenuItem
  540.         Caption = 'Save &As...'
  541.         ShortCut = 0
  542.         OnClick = SaveAsClick
  543.       end
  544.       object Close1: TMenuItem
  545.         Caption = '&Close'
  546.         ShortCut = 0
  547.         OnClick = Close1Click
  548.       end
  549.       object CloseAll1: TMenuItem
  550.         Caption = 'C&lose All'
  551.         ShortCut = 0
  552.         OnClick = CloseAll1Click
  553.       end
  554.       object N3: TMenuItem
  555.         Caption = '-'
  556.         ShortCut = 0
  557.       end
  558.       object Exit1: TMenuItem
  559.         Caption = 'E&xit'
  560.         ShortCut = 0
  561.         OnClick = Exit1Click
  562.       end
  563.     end
  564.     object Edit1: TMenuItem
  565.       Caption = '&Edit'
  566.       ShortCut = 0
  567.       OnClick = Edit1Click
  568.       object Undo: TMenuItem
  569.         Caption = '&Undo'
  570.         ShortCut = 16474
  571.         OnClick = UndoClick
  572.       end
  573.       object N2: TMenuItem
  574.         Caption = '-'
  575.         ShortCut = 0
  576.       end
  577.       object Cut: TMenuItem
  578.         Caption = 'Cu&t'
  579.         ShortCut = 16472
  580.         OnClick = CutClick
  581.       end
  582.       object Copy: TMenuItem
  583.         Caption = '&Copy'
  584.         ShortCut = 16451
  585.         OnClick = CopyClick
  586.       end
  587.       object Paste: TMenuItem
  588.         Caption = '&Paste'
  589.         ShortCut = 16470
  590.         OnClick = PasteClick
  591.       end
  592.       object SelectAll: TMenuItem
  593.         Caption = 'Select &All'
  594.         ShortCut = 16449
  595.         OnClick = SelectAllClick
  596.       end
  597.     end
  598.     object Icon1: TMenuItem
  599.       Caption = '&Icon'
  600.       ShortCut = 0
  601.       OnClick = Edit1Click
  602.       object ShowPixels: TMenuItem
  603.         Caption = '&Show Pixels'
  604.         Checked = True
  605.         ShortCut = 0
  606.         OnClick = ShowPixelsClick
  607.       end
  608.       object TestIcon: TMenuItem
  609.         Caption = '&Test Icon'
  610.         ShortCut = 0
  611.         OnClick = TestIconClick
  612.       end
  613.     end
  614.     object Window1: TMenuItem
  615.       Caption = '&Window'
  616.       ShortCut = 0
  617.       object Cascade1: TMenuItem
  618.         Caption = '&Cascade'
  619.         ShortCut = 0
  620.         OnClick = Cascade1Click
  621.       end
  622.       object Tile1: TMenuItem
  623.         Caption = '&Tile'
  624.         ShortCut = 0
  625.         OnClick = Tile1Click
  626.       end
  627.     end
  628.     object Help1: TMenuItem
  629.       Caption = '&Help'
  630.       ShortCut = 0
  631.       object Topics: TMenuItem
  632.         Caption = '&Help Topics'
  633.         ShortCut = 0
  634.         OnClick = TopicsClick
  635.       end
  636.       object About1: TMenuItem
  637.         Caption = '&About IconEdit'
  638.         ShortCut = 0
  639.         OnClick = About1Click
  640.       end
  641.     end
  642.   end
  643.   object OpenDialog1: TOpenDialog
  644.     DefaultExt = 'ICO'
  645.     FileEditStyle = fsEdit
  646.     Filter = 
  647.       'Icons (*.ico, *.exe, *.dll)|*.ico;*.exe;*.dll|Icons (*.ico)|*.ic' +
  648.       'o|Program Files (*.exe)|*.exe|Dll Files (*.dll)|*.dll'
  649.     Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
  650.     Title = 'Open Icon'
  651.     Left = 96
  652.   end
  653.   object SaveDialog1: TSaveDialog
  654.     DefaultExt = 'ICO'
  655.     FileEditStyle = fsEdit
  656.     Filter = 'Icons (*.ico)|*.ICO'
  657.     Options = [ofOverwritePrompt, ofHideReadOnly, ofNoReadOnlyReturn]
  658.     Left = 126
  659.   end
  660. end
  661.